From f9ba67f88aa959781848a6c2dd81f4a9dc7417b7 Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Tue, 3 Mar 2009 10:18:45 +0000 Subject: [PATCH] Merge from gnus--devo--0 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1564 --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/gnus-draft.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index e2da4693130..b73dfffc48a 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2009-03-03 Brian Sniffen (tiny change) + + * gnus-draft.el (gnus-draft-send): Bind gnus-message-setup-hook to nil + when sending a queued message to avoid extra mml tags. + 2009-03-02 Katsumi Yamaoka * mml.el (mml-insert-mime): Don't break parts that mm-uu dissected. diff --git a/lisp/gnus/gnus-draft.el b/lisp/gnus/gnus-draft.el index 9e051a960b1..0c94d0be5e1 100644 --- a/lisp/gnus/gnus-draft.el +++ b/lisp/gnus/gnus-draft.el @@ -146,6 +146,8 @@ Obeys the standard process/prefix convention." message-send-hook)) (message-setup-hook (and (not is-queue) message-setup-hook)) + (gnus-message-setup-hook (and (not is-queue) + gnus-message-setup-hook)) (message-signature (and (not is-queue) message-signature)) (gnus-agent-queue-mail (and (not is-queue) -- 2.30.2